#Faire une fonction en R qui permet de comparer deux nombres
#Par exemple, si on nous donne un texte ou la balise <html> apparaît n fois
#Le mettre dans la classe qui contient le chiffre le plus proche
#de n balises html

#Pour une fréquence d'une balise
comparer<-function(n){

nb<-seq(from=1,to=500,by=10);
print(nb)

res<-sapply(1:length(nb),disteuclidienne,nb,n)
print(res)
min<-min(res)
print(min)
}

disteuclidienne<-function(indice,nb,n){


  return(sqrt((n-nb[indice])^2))
  
}

#Pour 
